<%
strSQL = "select top 10 * from ProName order by id asc"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL, dbconnection, adOpenDynamic, 3
Dim TextArray11(9)


for i = 0 to ubound(TextArray11) 
	if not rs.eof then
		TextArray11(i)=rs("Names")
		rs.movenext
	else
		TextArray11(i)="&nbsp;"
	end if
next
set rs = nothing
%>
<table width="223" border="0" cellpadding="0" cellspacing="0" class="solid-bottom">
  <tr>
    <td><table width="186" height="27"  border="0"  cellpadding="0"  cellspacing="0"  id="secTable">
      <tr>
        <td  width="93" align="center"  class="sec2"  onclick="secBoard(0)"><%=TextArray11(6)%></td>
        <td  width="93" align="center"  class="sec1"  onclick="secBoard(1)"><%=TextArray11(7)%></td>
        
      </tr>
    </table></td>
    <td width="1">
<script  language="JavaScript" type="text/javascript">
function  secBoard(n)
{
for(i=0;i<secTable.cells.length;i++)
secTable.cells[i].className="sec1";
secTable.cells[n].className="sec2";
for(i=0;i<mainTable.tBodies.length;i++)
mainTable.tBodies[i].style.display="none";
mainTable.tBodies[n].style.display="block";
}
</script></td>
  </tr>
</table>
<table  border="0"  cellspacing="0"  cellpadding="0"  width="223"  height="120"  id="mainTable">
  <tbody  style="display:block;">
    <tr>
      <td width="223"><table height="73" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="3"><img src="images/ee.gif" width="223" height="1"></td>
    </tr>
  <tr>
    <td width="11"><img src="images/index_35.gif"></td>
	<%
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "select * from (select top 7 * from Goods order by ID desc) order by ID desc"
rs.Open strSQL, dbconnection, adOpenDynamic, 3
Dim TextArray8(6)

for i = 0 to ubound(TextArray8) 
	if not rs.eof then
	a=rs("Text")
		TextArray8(i)="<A href=""goods\""><img src="""&rs("Pic")&""" border=""0"" width=""55"" height=""55""/></A><br><A href=""goods\"">"&rs("Text")&"</A>"
		rs.movenext
	else
		TextArray8(i)="&nbsp;"
	end if
next
set rs = nothing
%>
    <td width="201"><div class="TablePicBottonDiv8">
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(0)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(1)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(2)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(3)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(4)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray8(5)%>
		</div>
	</div>
</div>
</td>
    <td width="7"><img src="images/index_37.gif" width="11" height="209"></td>
  </tr>
  <tr>
    <td colspan="3"><img src="images/index_42.gif" width="223" height="12"></td>
    </tr>
</table>
</td>
    </tr>
  </tbody>
  <tbody  style="display:none;">
    <tr>
      <td><table height="73" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="3"><img src="images/ee.gif" width="223" height="1"></td>
    </tr>
  <tr>
    <td width="11"><img src="images/index_35.gif"></td>
	<%
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "select * from (select top 6 * from Discount order by ID desc) order by ID desc"
rs.Open strSQL, dbconnection, adOpenDynamic, 3
Dim TextArray9(6)

for i = 0 to ubound(TextArray9) 
	if not rs.eof then
	a=rs("Text")
		TextArray9(i)="<A href=""Discount\""><img src="""&rs("Pic")&""" border=""0"" width=""55"" height=""55""/></A><br><A href=""Discount\"">"&rs("Text")&"</A>"
		rs.movenext
	else
		TextArray9(i)="&nbsp;"
	end if
next
set rs = nothing
%>
    <td width="201"><div class="TablePicBottonDiv8">
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(0)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(1)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(2)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(3)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(4)%>
		</div>
	</div>
	<div class="TablePicTopDiv8">
		<div class="TablePicDiv8">
			<%=TextArray9(5)%>
		</div>
	</div>
</div></td>
    <td width="7"><img src="images/index_37.gif" width="11" height="209"></td>
  </tr>
  <tr>
    <td colspan="3"><img src="images/index_42.gif" width="223" height="12"></td>
    </tr>
</table></td>
    </tr>
  </tbody>
  <tbody  style="display:none;">
  </tbody>
</table>